********************************************************************************
* appendix figure 11: long run pre-trends

********************************************************************************

cd "$main_dir/data"

use lpt_m600_i250_g,clear
gen zero=0
egen ring_fe=group(building_id l250)

reghdfe lrent zero txy_2014 txy_2015 txy_2016 txy_2017 txy_2018 /// 
	i.listing_bedroom i.listing_bathroom ///
	if building_sample==1 & building_built==2019 & ///
	tx250_min_number>0 & tx256_min_number>0 ///
	[aweight=building_sample_weight] ,absorb(building_id_year ring_fe) vce(cl building_id)

coefplot, ///
	keep(txy* zero) ///			
	vert ///
	yline(0) xtitle(Years to treatment) ///
	rename(zero = "2013" txy_2014="2014" txy_2015 = "2015" txy_2016 = "2016" txy_2017="2017" txy_2018="2018")  ///
	ytitle("Event Study Coefficient") graphregion(color(white)) bgcolor(white) ///
	yline(0) omit
